home *** CD-ROM | disk | FTP | other *** search
/ The X-Philes (2nd Revision) / The X-Philes Number 1 (1995).iso / xphiles / hp48_2 / scanner < prev    next >
Text File  |  1995-03-31  |  3KB  |  123 lines
  1. Article 1587 of comp.sys.handhelds:
  2. Path: en.ecn.purdue.edu!pur-ee!mentor.cc.purdue.edu!purdue!mailrus!cs.utexas.edu!yale!mintaka!ogicse!plains!harlow
  3. From: harlow@plains.UUCP (Jay B. Harlow)
  4. Newsgroups: comp.sys.handhelds
  5. Subject: 'New' Functions for hp42s
  6. Message-ID: <3842@plains.UUCP>
  7. Date: 22 Mar 90 18:11:47 GMT
  8. Reply-To: harlow@plains.UUCP (Jay B. Harlow)
  9. Organization: North Dakota State University, Fargo
  10. Lines: 109
  11.  
  12.  
  13. Hello,
  14.    With the advent of the hp48sx, i got looking on my 42s, boy guess what
  15. i found!
  16.  
  17. the memory scanner..... (gee why not on the hp28?
  18.  
  19. 'debugging' features:
  20.  
  21.     key        function
  22.     on-sqrt(x)    reset 
  23.     on-log        single tests (see below)
  24.     on-ln        continuous tests
  25.     on-sum+-xeq    memory  clear!
  26.  
  27. Single tests:
  28.     key        test
  29.     sum+        SPD ??
  30.     1/x        BEEP
  31.     sqrt(x)        DISPLAY, 7 'steps' of any key
  32.     log        ROM
  33.     ln        DRAM
  34.     xeq        URAM
  35.     sto        KeyBoard, need to press from upper-left to lower-right
  36.             sum+, 1/x, sqrt(x)...... . r/s, +
  37.     rcl        ESD ??
  38.     rdn(pi)        ok message
  39.     backspace(clear)    MEMORY SCANNER!!!!!! ;-)))
  40.  
  41. Memory Scanner:
  42.     key        function
  43.     up-arrow    +1000h nybbles
  44.     dn-arrow    -1000h nybbles
  45.     div-key        -100h
  46.     mul-key        +100h
  47.     -        -1h
  48.     +        +1h
  49.     cos        +16h, xmit on infrared??? (no printer to check)
  50.     0-9,a-b        enter a digit into memory, +1h (like base app)
  51.     .        execute address in ROM???
  52.     backspace    refresh
  53.  
  54. Addresses:
  55.  
  56.     40000-4020c    display
  57.     4020c-40xxx    status line
  58.     50000        memory
  59.     503f6, 2    len alpha reg
  60.     502f8        alpha reg
  61.     50082        last key ??
  62.     50084        key buffer head, tail 
  63.     50086        16 byte key buffer
  64. ; table of 5 nybble ptrs
  65.     500b8        ptr to top of stack, 
  66.             this is indirect, & points to last byte of stack,
  67.             go left or lower in memory
  68.             CAN HAVE MORE THAN ST X, ST Y, ST Z, ST T, ST L
  69.     500d6        ptr to program end?
  70.     500db        ptr to REGS var, & rest of var list
  71.  
  72. ; inst table?  
  73. ;    nybble len
  74. ;    str    name
  75. ;    addr    address?    ; 5 nybble address????
  76.  
  77.     1db62        ABS
  78.     1e8a8        XFCN
  79.     1e9fa        [MIN]
  80.     1ea2d        'TED4ME' ??? looks like a function but no work....
  81.     1ea3f        'DDST X'
  82.  
  83. ;    i have a whole list of em, but to lazy to type em in.....
  84.  
  85. 'New' instuctions.....
  86.  
  87.     XFCN str    wants a program label?, needs something else
  88.             always says 'Nonexistent'
  89.  
  90.     [FIND]        find a value in an array.
  91.             01 INDEX "REGS"        ; look in this array
  92.             02 2            ; number to look for
  93.             03 [FIND]        ; look for a 2 (ST X)
  94.             04 RCLIJ        ; where found
  95.  
  96.     [MIN]        find the minimum in array
  97.     [MAX]        find the maximum in array
  98.             this two look in a single column
  99.             returns: ST Y - row where found
  100.                  ST X - value 
  101.  
  102.             01 3
  103.             02 ENTER
  104.             03 DIM "AA"        ; a sqauare 3x3
  105.             04 1            ; starting row
  106.             05 3            ; column
  107.             06 STOIJ        ; look in third column
  108.             07 [MIN]        ; or [MAX]
  109.  
  110. Well for now thats enough?
  111.  
  112.     Hope you enjoy these new findings,
  113.     
  114.         Jay B. Harlow
  115.             
  116. -- 
  117.         Jay B. Harlow    <harlow@plains.nodak.edu>
  118.     uunet!plains!harlow (UUCP)    harlow@plains (Bitnet)
  119.  
  120. Of course the above is personal opinion, And has no bearing on reality...
  121.  
  122.  
  123.